home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.mactech.com 2010
/
ftp.mactech.com.tar
/
ftp.mactech.com
/
online
/
source
/
c
/
compilers
/
Bob 1.5.sit.hqx
/
Bob 1.5
/
t.bob
< prev
next >
Wrap
Text File
|
1993-10-02
|
213b
|
12 lines
main()
{
a = "ABCDabcd";
len = sizeof(a);
for (i = 0; i < len; ++i)
print(a[i],"\n");
for (i = 0; i < len; ++i)
if (a[i] >= 'a' && a[i] <= 'z')
a[i] = a[i] - 'a' + 'A';
print(a,"\n");
}